gusucode.com > 酷维企业网站CMS管理系统 v2.1.0 > 酷维企业网站CMS管理系统 v2.1.0\code\Gbook.asp
<%
'程序名称:酷维企业网站程序CMS
'运行环境:ASP+ACCESS
'程序大小:4.60MB
'软件类型:ASP源码
'联系方式:QQ:921072227
'程序演示:企业程序
'官方网站:http://cms.coczz.com
%>
<!--#include file="Connection.asp"-->
<!--#include file="admin/system/WebConfig.asp"-->
<!--#include file="admin/system/Check_SI.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="Style.css" type="text/css">
<title><%=webname%>--意见反馈</title>
</head>
<body>
<SCRIPT LANGUAGE="JavaScript">
<!--
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function checkfk()
{
if(checkspace(document.fkinfo.fksubject.value)) {
document.fkinfo.fksubject.focus();
alert("您没有填写主题！");
return false;
}
if(checkspace(document.fkinfo.fkusername.value)) {
document.fkinfo.fkusername.focus();
alert("请填写您的姓名！");
return false;
}
if(checkspace(document.fkinfo.fklaizi.value)) {
document.fkinfo.fklaizi.focus();
alert("请填写您来自哪里！");
return false;
}
if(checkspace(document.fkinfo.fkcontent.value)) {
document.fkinfo.fkcontent.focus();
alert("请填写反馈信息内容！");
return false;
}
if(document.fkinfo.fkemail.value.length!=0)
{
if (document.fkinfo.fkemail.value.charAt(0)=="." ||
document.fkinfo.fkemail.value.charAt(0)=="@"||
document.fkinfo.fkemail.value.indexOf('@', 0) == -1 ||
document.fkinfo.fkemail.value.indexOf('.', 0) == -1 ||
document.fkinfo.fkemail.value.lastIndexOf("@")==document.fkinfo.fkemail.value.length-1 ||
document.fkinfo.fkemail.value.lastIndexOf(".")==document.fkinfo.fkemail.value.length-1)
{
alert("Email地址格式不正确！");
document.fkinfo.fkemail.focus();
return false;
}
}
else
{
alert("Email不能为空！");
document.fkinfo.fkemail.focus();
return false;
}
}
//-->
</script>
<!--网站顶部开始 mainboy -->
<!--#include file="top_v.asp" -->
<!--网站顶部结束 mainboy -->
<TABLE width="980" height="30" border=0 align=center cellPadding=0 cellSpacing=0 background="Images/topBar_bg.gif">
<TBODY>
<TR bgColor=#ffffff>
<TD colSpan=3 height=2></TD>
</TR>
<TR>
<TD width="56" height=25 align=right><img src="images/arrow3.gif" width="29" height="11"></TD>
<TD width="910"><FONT color=#333333>您的位置： </FONT><a href="default.htm">网站的首页</a> >> 客户留言</TD>
<TD width="14"> </TD>
</TR>
</TBODY>
</TABLE> <table border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="4"></td>
</tr>
</table>
<table width="980" align="center" border="0" cellspacing="0" cellpadding="0" class="table-zuoyou" bordercolor="#CCCCCC">
<tr>
<td width="212" height="427" valign="top" bordercolor="#FFFFFF"><!--#include file="left_i.asp" --></td>
<td width="554" valign="top" bordercolor="#FFFFFF" bgcolor="#FFFFFF" style="BORDER-right: #d8d8d8 1px solid">
<BR><%dim action
action=request.QueryString("action")
select case action
case ""
%>
<table width="510" height="320" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="500" height="30" align="center"><font color="#ff0000">尊敬的客户，请在这里将您们的宝贵建议反馈给我们，我们会及时回复，谢谢 ！</font> </td>
</tr>
<tr>
<td height="279" align="center" valign="top"><table border="0" cellspacing="2" cellpadding="1" align="center" width="500">
<form name="fkinfo" method="post" action="gbook.asp?action=save">
<tr>
<td width="22%" align="right">类 型：</td>
<td style="padding-left:10px" width="78%"><div align="left">
<select name="fkleixing" id="select2">
<option value="1">简单的留言</option>
<option value="2">对网站的意见</option>
<option value="3">对公司的建议</option>
<option value="4">具有合作意向</option>
<option value="5">产品投诉</option>
<option value="6">服务投诉</option>
</select>
</div></td>
</tr>
<tr>
<td align="right">主 题：</td>
<td style="padding-left:10px"><div align="left">
<input name="fksubject" type="text" id="fksubject">
</div></td>
</tr>
<tr>
<td align="right">姓 名：</td>
<td style="padding-left:10px"><div align="left">
<input name="fkusername" type="text" id="fkusername">
</div></td>
</tr>
<tr>
<td align="right">e-mail：</td>
<td style="padding-left:10px"><div align="left">
<input name="fkemail" type="text" id="fkemail" size="50">
</div></td>
</tr>
<tr>
<td align="right">地 址：</td>
<td style="padding-left:10px"><div align="left">
<input name="fklaizi" type="text" id="fklaizi" size="50">
</div></td>
</tr>
<tr>
<td align="right">电 话：</td>
<td style="padding-left:10px"><div align="left">
<input name="fktel" type="text" id="fktel">
</div></td>
</tr>
<tr>
<td align="right">信 息：</td>
<td style="padding-left:10px"><div align="left">
<textarea name="fkcontent" cols="50" rows="8" id="fkcontent"></textarea>
</div></td>
</tr>
<tr>
<td></td>
<td height="30" style="padding-left:10px"><div align="left">
<input class="go-wenbenkuang" name="submit" value=提交信息 type=submit onClick="return checkfk();">
[请注意适当使用<font color="#FF0000">Enter</font>键来换行] </div></td>
</tr>
</form>
</table>
酷维企业CMS网站管理系统 - 企业建站首选服务商！<A href="http://cms.coczz.com" target="_blank">http://cms.coczz.com</A> 销售客服QQ:921072227</td>
</tr>
</table>
<%
case "save"
if session("fkfk")=minute(now) then
response.write "<script language=javascript>alert('对不起，您不可以重复提交信息，请稍后再试！');history.go(-1);</script>"
response.End
end if
function HTMLEncode2(fString)
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
fString = Replace(fString, CHR(10), "<BR>")
HTMLEncode2 = fString
end function
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from Gbook",conn,1,3
rs.addnew
rs("fksubject")=trim(request("fksubject"))
rs("fkleixing")=request("fkleixing")
rs("fkcontent")=htmlencode2(trim(request("fkcontent")))
rs("fkusername")=trim(request("fkusername"))
rs("fkemail")=trim(request("fkemail"))
rs("fktel")=trim(request("fktel"))
rs("fklaizi")=trim(request("fklaizi"))
rs("fkdate")=now
rs("fkip")=Request.ServerVariables("remote_addr")
rs.update
rs.close
set rs=nothing
session("fkfk")=minute(now)
response.write "<br><br><center>您的信息反馈已成功提交，感谢您的参与！<br><br><a href=Default.htm>返回首页</a></center>"
end select%></td>
<td width="214" valign="top" bordercolor="#FFFFFF"><!--#include file="right_i.asp" --></td>
</tr>
</table>
<table border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="6"></td>
</tr>
</table>
<!--网站尾部开始 -->
<!--#include file="foot.asp" -->
<!--网站尾部结束 --></Body></Html>